www.gusucode.com > 云枫工作室企业网站源码 1 > 云枫工作室企业网站源码 1.0/云枫工作室企业网站源码(asp无限制版)1.0/web/admin/Manage_adminrank.asp
<!--#include file="conn.asp"-->
<!--#include file="check.asp" -->
<%
select case request("action")
case ""
call main()
case "Modifysave"
call Modifysave()
end select
%>
<%
sub main()
id=request("id")
wheres=""
if id<>"" then
wheres="and id="&id&""
end if
set rs = server.CreateObject ("Adodb.recordset")
sql="select * from tsm_rank where 1=1 "&wheres&" order by id desc"
rs.open sql,conn,1,1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<link href="css.css" rel="stylesheet" type="text/css">
</head>
<script language="JavaScript">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
if (restore) selObj.selectedIndex=0;
}
//-->
</script>
<body>
<!--#include file="top.htm" -->
<br>
<form method="post" action="Manage_adminrank.asp?action=Modifysave" name="form3">
<table width="90%" border="0" cellpadding="3" cellspacing="1" bgcolor="#FFFFFF" align="center">
<tr>
<td height="25" colspan="2" align="center" valign="middle" bgcolor="#F0F0F0"><font color="#FF0000"><b>权限查询</b></font></td>
</tr>
<tr>
<td width="15%" height="25" bgcolor="#F0F0F0">权限：</td>
<td width="85%" bgcolor="#F0F0F0">
<select name="aid" size="1" id="aid" onChange="MM_jumpMenu('self',this,1)">
<%
set rs1=server.CreateObject("adodb.recordset")
sql1="select * from tsm_rank"
rs1.open sql1,conn,1,1
do while not rs1.eof
%>
<option value="Manage_adminrank.asp?id=<%=rs1("id")%>"<%=selected(rs1("id"),rs("id"))%>><%=rs1("title")%></option>
<%
rs1.movenext
loop
rs1.close
set rs1=nothing
%>
</select>
</td>
</tr>
</table>
<br>
<table width="90%" border="0" align="center" cellpadding="5" cellspacing="0">
<tr>
<td height="25" align="center" valign="middle" background="img/menu_manage.gif"><font color="#FFFFFF"><b>权 限 管 理</b></font></td>
</tr>
</table>
<table width="90%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#E3E3E3" class="text">
<tr bgcolor="#F6F6F6">
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">产品管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_pro" value="0"<%=checked(rs("rank_pro"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">新产品管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_pro1" value="0"<%=checked(rs("rank_pro1"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">公司概况</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_news" value="0"<%=checked(rs("rank_news"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">新闻动态</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_news1" value="0"<%=checked(rs("rank_news1"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">招聘管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_job" value="0"<%=checked(rs("rank_job"),1)%>></td>
</tr>
</table>
</td>
</tr>
<tr bgcolor="#F6F6F6">
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">会员管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_user" value="0"<%=checked(rs("rank_user"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">友情链接</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_link" value="0"<%=checked(rs("rank_link"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">视频管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_flash" value="0"<%=checked(rs("rank_flash"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">信息系统</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_newsall" value="0"<%=checked(rs("rank_newsall"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">栏目管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_newsallbc" value="0"<%=checked(rs("rank_newsallbc"),1)%>></td>
</tr>
</table>
</td>
</tr>
<tr bgcolor="#F6F6F6">
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">下载管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_soft" value="0"<%=checked(rs("rank_soft"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">通讯管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_qq" value="0"<%=checked(rs("rank_qq"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">留言管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_message" value="0"<%=checked(rs("rank_message"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">留言板管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_liuyan" value="0"<%=checked(rs("rank_liuyan"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">图片管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_photo" value="0"<%=checked(rs("rank_photo"),1)%>></td>
</tr>
</table>
</td>
</tr>
<tr bgcolor="#F6F6F6">
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">权限管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_rank" value="0"<%=checked(rs("rank_rank"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">产品订单管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_order" value="0"<%=checked(rs("rank_order"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">新产品类管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_pro1bc" value="0"<%=checked(rs("rank_pro1bc"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">用户类管理</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_userbc" value="0"<%=checked(rs("rank_userbc"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">其他管理-删除</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_qita_del" value="0"<%=checked(rs("rank_qita_del"),1)%>></td>
</tr>
</table>
</td>
</tr>
<tr bgcolor="#F6F6F6">
<td width="20%" align="center" height="25" bgcolor="#F6F6F6">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">访问统计</td>
</tr>
<tr>
<td align="center"><input type="checkbox" name="rank_count" value="0"<%=checked(rs("rank_count"),1)%>></td>
</tr>
</table>
</td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6"> </td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6"> </td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6"> </td>
<td width="20%" align="center" height="25" bgcolor="#F6F6F6"> </td>
</tr>
<tr><td colspan="5" bgcolor="#F6F6F6" align="center"><input name="id" type="hidden" id="id" value="<%=rs("id")%>"><input type="submit" name="Submit" value="保存"></td></tr>
</table>
</form>
</body>
</html>
<%
end sub
%>
<%
sub Modifysave()
set rs=server.createobject("adodb.recordset")
sql1="select * from tsm_rank where id="& request("id")
rs.open sql1,conn,1,3
select case request("rank_pro")
case ""
rs("rank_pro") = 0
case 0
rs("rank_pro") = 1
end select
select case request("rank_pro1")
case ""
rs("rank_pro1") = 0
case 0
rs("rank_pro1") = 1
end select
select case request("rank_news")
case ""
rs("rank_news") = 0
case 0
rs("rank_news") = 1
end select
select case request("rank_news1")
case ""
rs("rank_news1") = 0
case 0
rs("rank_news1") = 1
end select
select case request("rank_job")
case ""
rs("rank_job") = 0
case 0
rs("rank_job") = 1
end select
select case request("rank_user")
case ""
rs("rank_user") = 0
case 0
rs("rank_user") = 1
end select
select case request("rank_link")
case ""
rs("rank_link") = 0
case 0
rs("rank_link") = 1
end select
select case request("rank_flash")
case ""
rs("rank_flash") = 0
case 0
rs("rank_flash") = 1
end select
select case request("rank_newsall")
case ""
rs("rank_newsall") = 0
case 0
rs("rank_newsall") = 1
end select
select case request("rank_newsallbc")
case ""
rs("rank_newsallbc") = 0
case 0
rs("rank_newsallbc") = 1
end select
select case request("rank_soft")
case ""
rs("rank_soft") = 0
case 0
rs("rank_soft") = 1
end select
select case request("rank_qq")
case ""
rs("rank_qq") = 0
case 0
rs("rank_qq") = 1
end select
select case request("rank_message")
case ""
rs("rank_message") = 0
case 0
rs("rank_message") = 1
end select
select case request("rank_liuyan")
case ""
rs("rank_liuyan") = 0
case 0
rs("rank_liuyan") = 1
end select
select case request("rank_photo")
case ""
rs("rank_photo") = 0
case 0
rs("rank_photo") = 1
end select
select case request("rank_rank")
case ""
rs("rank_rank") = 0
case 0
rs("rank_rank") = 1
end select
select case request("rank_message")
case ""
rs("rank_message") = 0
case 0
rs("rank_message") = 1
end select
select case request("rank_order")
case ""
rs("rank_order") = 0
case 0
rs("rank_order") = 1
end select
select case request("rank_pro1bc")
case ""
rs("rank_pro1bc") = 0
case 0
rs("rank_pro1bc") = 1
end select
select case request("rank_userbc")
case ""
rs("rank_userbc") = 0
case 0
rs("rank_userbc") = 1
end select
select case request("rank_qita_del")
case ""
rs("rank_qita_del") = 0
case 0
rs("rank_qita_del") = 1
end select
select case request("rank_count")
case ""
rs("rank_count") = 0
case 0
rs("rank_count") = 1
end select
rs.Update
rs.Close
set rs=nothing
conn.close
set conn=nothing
call ShowAlert("修改成功！","Manage_adminrank.asp?id="&request("id")&"")
end sub
%>